home *** CD-ROM | disk | FTP | other *** search
/ Aminet 50 / Aminet 50 (2002)(GTI - Schatztruhe)[!][Aug 2002].iso / Aminet / util / wb / AmiStart.lha / AmiStart.install < prev    next >
Text File  |  2002-06-17  |  8KB  |  316 lines

  1. ;AmiStart Install Script V0.60
  2.  
  3. (SET WelcomeToAmiStart "Welcome to the AmiStart installation...you should first start AmiStart without installing it to see if you like it")
  4. (SET EndMessage "please read the documentation especially the History and the Usage/ToolTypes section coz this install script only enables some options of AmiStart")
  5. (SET newPrefs 0)
  6. (SET newIcon 0)
  7. (SET newGraphics 0)
  8.  
  9. (SET @default-dest "clips:")
  10.  
  11. (MESSAGE WelcomeToAmiStart)
  12.  
  13. (SET @default-dest
  14.     (ASKDIR (PROMPT "Select a destination for the executable: \n(no drawer will be created)")
  15.         (HELP "this is the path for the AmiStart executable, nolmaly SYS:WbStartup")
  16.         (DEFAULT @default-dest)))
  17.  
  18. (SET destIcon (TACKON @default-dest "AmiStart.info"))
  19.  
  20. (COPYFILES (SOURCE "AmiStart") (DEST @default-dest))
  21.  
  22. (IF (EXISTS destIcon)
  23.     (
  24.         (IF (ASKBOOL
  25.                 (PROMPT "do you want to overwrite old AmiStart icon")
  26.                 (HELP "this could overwrite some TOOLTYPES, normaly choose NO but this will leave all ToolTypes as they are and will not create any new.\nI recommend to choose yes")
  27.             )
  28.             (
  29.                 (SET newIcon 1)
  30.                 (COPYFILES
  31.                     (SOURCE "AmiStart.info")
  32.                     (DEST @DEFAULT-DEST)
  33.                 )
  34.             )
  35.         )
  36.     )
  37.     (
  38.         (SET newIcon 1)
  39.         (COPYFILES
  40.             (SOURCE "AmiStart.info")
  41.             (DEST @DEFAULT-DEST)
  42.         )
  43.     )
  44. )
  45.  
  46. (SET @prefs-dest "")
  47.  
  48. (IF (> newIcon 0)
  49.     (IF (ASKBOOL
  50.             (PROMPT "do you want to install a default prefs file \n(notice: see HELP)")
  51.             (HELP "you can use your old, but you must use one\nthis must be done by the first installation\nfurther installations have already configured prefs files")
  52.         )
  53.         (
  54.             (SET @prefs-dest
  55.                 (ASKDIR
  56.                     (PROMPT "Select a destination for the (default) prefs file:\n(no drawer will be created)")
  57.                     (HELP "this ist the path for the AmiStart default prefs file, nolmaly SYS:WbStartup")
  58.                     (DEFAULT @default-dest)
  59.                 )
  60.             )
  61.             (COPYFILES (SOURCE "sm.prefs") (DEST @prefs-dest))
  62.             (SET newPrefs 1)
  63.         )
  64.     )
  65. )
  66.  
  67. (SET @icon-dest "")
  68.  
  69. (IF (ASKBOOL
  70.         (PROMPT "do you want to install a default graphics package")
  71.         (HELP "this are item-icons/logos for AmiStart, skip if you have already installed one package")
  72.     )
  73.     (
  74.         (SET @icon-dest
  75.             (ASKDIR
  76.                 (PROMPT "Select a destination for the graphical data:\n(two drawers named icons and textures will be created)")
  77.                 (HELP "this ist the path for the AmiStart icon files")
  78.                 (DEFAULT @default-dest)
  79.             )
  80.         )
  81.         (SET IconDir (TACKON @icon-dest "icons"))
  82.         (SET TextureDir (TACKON @icon-dest "textures"))
  83.         (MAKEDIR IconDir)
  84.         (MAKEDIR TextureDir)
  85.         (COPYFILES (SOURCE "Icons") (DEST IconDir) (ALL))
  86.         (COPYFILES (SOURCE "Textures") (DEST TextureDir) (ALL))
  87.         (SET newGraphics 1)
  88.     )
  89. )
  90.  
  91. (IF (ASKBOOL
  92.         (PROMPT "do you want to install example modules and tools\n(a directory named modules will be created)")
  93.         (HELP "see the documentation")
  94.     )
  95.     (
  96.         (SET ModulesDir (TACKON @icon-dest "modules"))
  97.         (MAKEDIR ModulesDir)
  98.         (COPYFILES (SOURCE "modules") (DEST ModulesDir) (ALL))
  99.     )
  100. )
  101.  
  102.  
  103. (SET ami_languages
  104. (ASKOPTIONS (PROMPT "select additional catalog files for AmiStart (english is buildin)")
  105.     (HELP "select additional languages for AmiStart...")
  106.     (CHOICES "deutsch")
  107.     (DEFAULT 0)
  108. ))
  109.  
  110. (if (> ami_languages 0) (
  111.    (set Cat_dir "locale:catalogs")
  112.    (if (bitand ami_languages 1)         ((set lang "deutsch") (copyfiles (source (tackon "Catalogs" lang)) (choices "AmiStart.catalog") (dest (tackon Cat_dir lang)))))
  113. ))
  114.  
  115.  
  116. (SET @doc-dest "")
  117.  
  118. (IF (ASKBOOL
  119.         (PROMPT "do you want to install the documentation")
  120.         (HELP "")
  121.     )
  122.     (
  123.         (SET @doc-dest
  124.             (ASKDIR
  125.                 (PROMPT "Select a destination for the documentation:\n(no drawer will be created)")
  126.                 (HELP "")
  127.                 (DEFAULT @default-dest)
  128.             )
  129.         )
  130.         (COPYFILES (SOURCE "AmiStart.guide") (INFOS) (DEST @doc-dest))
  131.     )
  132. )
  133.  
  134. (SET docpath (TACKON @doc-dest "AmiStart.guide"))
  135.  
  136. (SET AmiIcon (TACKON @default-dest "AmiStart"))
  137.  
  138. (IF (> newIcon 0)
  139.     (
  140.         (TOOLTYPE
  141.             (DEST AmiIcon)
  142.             (SETTOOLTYPE "HELPFILE" docpath)
  143.         )
  144.  
  145.         (IF (> newPrefs 0)
  146.             (
  147.                 (SET AmiPrefs (TACKON @prefs-dest "sm.prefs"))
  148.                 (TOOLTYPE
  149.                     (DEST AmiIcon)
  150.                     (SETTOOLTYPE "PREFS" AmiPrefs)
  151.                 )
  152.             )
  153.         )
  154.  
  155.         (IF (> newGraphics 0)
  156.             (
  157.                 (SET AmiStartIcon (TACKON IconDir "start"))
  158.                 (TOOLTYPE
  159.                     (DEST AmiIcon)
  160.                     (SETTOOLTYPE "STARTICON" AmiStartIcon)
  161.                     (SETTOOLTYPE "DATAPATH" @icon-dest)
  162.                 )
  163.             )
  164.         )
  165.  
  166.         (IF (ASKBOOL
  167.                 (PROMPT "do you want to use the AmiStart TaskBar")
  168.                 (HELP "")
  169.             )
  170.             (TOOLTYPE
  171.                 (DEST AmiIcon)
  172.                 (SETTOOLTYPE "TASKBAR" "")
  173.             )
  174.  
  175.  
  176.             (IF (ASKBOOL
  177.                     (PROMPT "do you want to make AmiStart invisible")
  178.                     (HELP "using this flag causes AmiStart to be invisible on the Workbench")
  179.                 )
  180.                 (
  181.                     (TOOLTYPE
  182.                         (DEST AmiIcon)
  183.                         (SETTOOLTYPE "SILENT" "")
  184.                     )
  185.                     (IF (ASKBOOL
  186.                             (PROMPT "do you want to make AmiStart to AutoPopup when\nmouse reaches leftmost bottom position")
  187.                             (HELP "using this flag causes AmiStart to visible when the mousepointer reaches the leftmost bottem position")
  188.                         )
  189.                         (TOOLTYPE
  190.                             (DEST AmiIcon)
  191.                             (SETTOOLTYPE "AUTOPOPUP" "")
  192.                         )
  193.                     )
  194.                 )
  195.                 (IF (ASKBOOL
  196.                         (PROMPT "do you want to make AmiStarts starticon transparent (Warning: see HELP)")
  197.                         (HELP "this has some restrictions, see docs")
  198.                     )
  199.                     (TOOLTYPE
  200.                         (DEST AmiIcon)
  201.                         (SETTOOLTYPE "TRANSPARENT" "")
  202.                     )
  203.                 )
  204.             )
  205.         )
  206.  
  207.         (SET @hotkey
  208.             (ASKSTRING
  209.                 (PROMPT "change the Hotkey to popup AmiStart")
  210.                 (HELP "pressing this hotkey popups/hides AmiStart\nfor example\nctrl p\nlalt ctrl a\nlamiga u")
  211.                 (DEFAULT "ctrl p")
  212.             )
  213.         )
  214.  
  215.         (SET jumpqualifier
  216.             (ASKCHOICE (PROMPT "select a qualifier to jump multiple entries with the up/down keys")
  217.                 (HELP "pressing this key down while using the cursor up/down keys\njumps as many entrys as visible")
  218.                 (CHOICES    "left alt"
  219.                              "right alt"
  220.                              "left shift"
  221.                              "right shift"
  222.                              "control"
  223.                  )
  224.                 (DEFAULT 0)
  225.             )
  226.         )
  227.  
  228.         (if (= jumpqualifier 0) (SET @qualifier "lalt") )
  229.         (if (= jumpqualifier 1) (SET @qualifier "ralt") )
  230.         (if (= jumpqualifier 2) (SET @qualifier "lshift") )
  231.         (if (= jumpqualifier 3) (SET @qualifier "rshift") )
  232.         (if (= jumpqualifier 4) (SET @qualifier "ctrl") )
  233.  
  234.  
  235.         (TOOLTYPE
  236.             (DEST AmiIcon)
  237.             (SETTOOLTYPE "CX_HOTKEY" @hotkey)
  238.             (SETTOOLTYPE "JUMPQUALIFIER" @qualifier)
  239.         )
  240.  
  241.         (IF (ASKBOOL
  242.             (PROMPT "do you want to use the old fast scaling algorithm for small items (see HELP)")
  243.             (HELP "fast scaling is a bit faster but the items are looking bad,\nfast scaling should be used on non true/hi color views")
  244.             )
  245.  
  246.             (TOOLTYPE
  247.                 (DEST AmiIcon)
  248.                 (SETTOOLTYPE "FASTSCALE" "")
  249.             )
  250.         )
  251.  
  252.         (IF (ASKBOOL
  253.             (PROMPT "do you want to use iconobject.library for loading icons (see HELP)")
  254.             (HELP "the iconobject.library is a part from the Scalos package\nfor example you can use newicons without the newicon patch")
  255.             )
  256.  
  257.             (TOOLTYPE
  258.                 (DEST AmiIcon)
  259.                 (SETTOOLTYPE "USEICONOBJECT" "")
  260.             )
  261.         )
  262.  
  263.         (IF (ASKBOOL
  264.                 (PROMPT "do you want to load icons late (see HELP)")
  265.                 (HELP "normaly AmiStart loads icons while bootup, using this flag icons will be loaded if you first open their window this allows AmiStart to boot faster and if not all Icons are used less memory is needed")
  266.             )
  267.  
  268.             (TOOLTYPE
  269.                 (DEST AmiIcon)
  270.                 (SETTOOLTYPE "LATELOAD" "")
  271.             )
  272.         )
  273.  
  274.         (IF (ASKBOOL
  275.                 (PROMPT "do you want to use a existing extern info-module (see HELP)")
  276.                 (HELP "you can use the standard info-requester or a seperate one\nfor example the information.module from the scalos package")
  277.             )
  278.             (
  279.                 (SET @info-module
  280.                     (ASKFILE
  281.                         (PROMPT "Select a info module")
  282.                         (HELP "")
  283.                         (DEFAULT "information.module")
  284.                     )
  285.                 )
  286.                 (TOOLTYPE
  287.                     (DEST AmiIcon)
  288.                     (SETTOOLTYPE "INFOMODULE" @info-module)
  289.                 )
  290.  
  291.             )
  292.         )
  293.         (IF (ASKBOOL
  294.                 (PROMPT "do you like to use items like AppIcons in AmiStart(see HELP)")
  295.                 (HELP "dropping items from the workbench onto a part of AmiStart attaches\nthem to AmiStart, but you can press a qualifier while dropping Projects\nand AmiStart will launch the Item with the dropped Project")
  296.             )
  297.             (
  298.                 (SET @appitem-qual
  299.                     (ASKSTRING
  300.                         (PROMPT "enter a qualifier string, use a single or combinations (seperated by space) of following keys:\nlshift\nrshift\nlcommand\nrcommand\nlalt\nralt\nctrl\nmidbutton")
  301.                         (HELP "without pressing this qualifier while dropping Icons on AmiStart\nthese Icons will only be attached to AmiStart")
  302.                         (DEFAULT "lshift")
  303.                     )
  304.                 )
  305.                 (TOOLTYPE
  306.                     (DEST AmiIcon)
  307.                     (SETTOOLTYPE "APPICONQUALIFIER" @appitem-qual)
  308.                 )
  309.  
  310.             )
  311.         )
  312.  
  313.     )
  314. )
  315.  
  316. (MESSAGE EndMessage)